Monster Media 1996 #15/Monster Media Number 15 (Monster Media)(July 1996).ISO/internet/javas99d.zip/JAVAS.EXE/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1996-05-27 | 21KB | 540 lines

object MainForm: TMainForm
  Left = 187
  Top = 121
  Width = 435
  Height = 297
  Caption = 'Java Station'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  Position = poScreenCenter
  WindowMenu = Window1
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedPanel: TPanel
    Left = 0
    Top = 0
    Width = 427
    Height = 30
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object OpenBtn: TSpeedButton
      Left = 28
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Open|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        333FFFFFFFFFFFFFF3333380000000000000333333888888888888883F333300
        7B7B7B7B7B7B033333883F33333333338F33330F07B7B7B7B7B70333338F8F33
        3333333383F3330B0B7B7B7B7B7B7033338F83F33333333338F3330FB0B7B7B7
        B7B7B033338F38F333333333383F330BF07B7B7B7B7B7B03338F383FFFFF3333
        338F330FBF000007B7B7B703338F33888883FFFFFF83330BFBFBFBF000000033
        338F3333333888888833330FBFBFBFBFBFB03333338F333333333338F333330B
        FBFBFBFBFBF03333338F33333FFFFFF83333330FBFBF0000000333333387FFFF
        8888888333333330000033333333333333388888333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333333333333333333}
      NumGlyphs = 2
      OnClick = FileOpenItemClick
    end
    object SaveBtn: TSpeedButton
      Left = 52
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Save|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333FFFFFFFFFFFFFF3333380000000000008333
        333888F8FF888F888F333330CC08CCF770CC0333333888F8FF888F888F333330
        CC08CCF770CC0333333888F888888F888F333330CC07887770CC03333338888F
        FFFFF8888F333330CC60000006CC033333388888888888888F333330CCCCCCCC
        CCCC033333388888888888888F333330C6000000006C03333338888888888888
        8F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330C0FFFFFFFF0C0333
        333888FFFFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330
        C0FFFFFFFF0C0333333888FFFFFFFF888F33333000FFFFFFFF000333333888FF
        FFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F33333800000000
        0000833333388888888888888333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333333333333333333}
      NumGlyphs = 2
      OnClick = FileSaveItemClick
    end
    object CutBtn: TSpeedButton
      Left = 87
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Cut|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333FFFF333333FF
        FF33333844833333384483333338888FF33338888FF333843348333384334833
        3388F388F333883388F3338433343333433348333388F338F3338F3388F33384
        33343333433348333388FF38FF338F3388333338433483384334833333388FF8
        8FF88FF883333333844448844448333333338888888888883333333333444444
        4433333333333388888888333333333333346FF6433333333333333883F88F33
        333333333330F00F0333333333333338388383F333333333330FFFF0F0333333
        3333338333F8383F3333333330FFF00FFF033333333338333883F383F3333333
        0FFF0330FFF033333333833383383F383F333330FFF033330FFF033333383338
        333383F383F3330FFF03333330FFF033338F33833333383F38F3330FF0333333
        330FF033338F383333333383F8F3330F033333333330F033338F833333333338
        38F3330033333333333300333388333333333333883333333333333333333333
        33333333333333333333}
      NumGlyphs = 2
      OnClick = CutItemClick
    end
    object CopyBtn: TSpeedButton
      Left = 111
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Copy|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333FFFFFFFFFF33333333300000000003333333333888888888
        8F3333333330FFFFFFFF033333333338F33333338F3333333330BFBFBFBF0333
        33333338F3FFFFFF8F3333333330F888888F033333333338F88888838F333333
        3330BFBFBFBF0333333FFFF8F3FFFFFF8F3333000000F888888F033333888888
        F88888838F33330FFFF0BFBFBFBF0333338F3338F3FFFFFF8F33330FFFF0F888
        888F0333338F3338F88888838F33330F7770BFBFBFBF0333338F3338F333333F
        8F33330FFFF0FFFFFF000333338F3338F33333888333330F7770BFBFBF003333
        338F3338FFFFFF883333330FFFF0000000033333338F3338888888833333330F
        777777F033333333338F33333338F3333333330FFFFFFFF033333333338F3333
        33F8F3333333330FFFFFF00033333333338F3333388833333333330FFFFFF003
        33333333338FFFFFF88333333333330000000033333333333388888888333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333333333333333333}
      NumGlyphs = 2
      OnClick = CopyItemClick
    end
    object PasteBtn: TSpeedButton
      Left = 135
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Paste|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333FFFFFFFFF333333333300000000033333333333888888
        888F33333333330BFBFBFB03333FFFFFFF8F3FFFFF8F33000000000F88888F03
        33888888888F8888838F307F7F7F7F0BFBFBFB0338F33333338F333FFF8F30F7
        F7F7F70F77888F0338F33333338FFF88838F307F7F7F74444BFBFB0338F33333
        38888F3FFF8F30F7F7F7F7C447888F0338F3333333888F88838F307F7F7F744C
        4BFBFB0338F3333338888F333F8F30F7F7F7444F4FFF880338F33333888F8333
        8883307F7F74440BFBFB803338F33338888FFFFF883330F7F744470000000333
        38F33388838888888333307F7F747F7F0333333338F3333833338F33333330F7
        F7F7F7F70333333338F3333333338F333333307F7F7F7F7F0333333338F33FFF
        FFF38F33333330F7444444F703333333383F888888FF833333333300ECCCC400
        33333333338838888888333333333333ECCCC433333333333333388888333333
        333333333EEEE333333333333333333333333333333333333333333333333333
        33333333333333333333}
      NumGlyphs = 2
      OnClick = PasteItemClick
    end
    object ExitBtn: TSpeedButton
      Left = 400
      Top = 2
      Width = 22
      Height = 25
      Hint = 'Exit|'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777
        777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333
        33888888888888877F7F788888888888888F333FF88844444400888FFF444444
        88888888888333888883333334D5007FFF433333333338F888F3338F33333333
        345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8
        78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF
        FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F
        3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333
        3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333
        345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8
        F8FFFF8F33333333344444444443333333333888888888833333333333333333
        3333333333333333FFFFFF333333333333300000033333333333333888888F33
        333333333330AAAA0333333333333338FFFF8F33333333333330000003333333
        33333338888883333333}
      NumGlyphs = 2
      OnClick = FileExitItemClick
    end
    object NewBtn: TSpeedButton
      Left = 3
      Top = 2
      Width = 25
      Height = 25
      Hint = 'New|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
      OnClick = FileNewItemClick
    end
    object CompileBtn: TSpeedButton
      Left = 320
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Compile|'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        59905555555555555777555555555555555555555555555555550000}
      NumGlyphs = 2
      OnClick = CompileItemClick
    end
    object SearchBtn: TSpeedButton
      Left = 170
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Search|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
        300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
        330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
        333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
        339977FF777777773377000BFB03333333337773FF733333333F333000333333
        3300333777333333337733333333333333003333333333333377333333333333
        333333333333333333FF33333333333330003333333333333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = SearchItemClick
    end
    object ReplaceBtn: TSpeedButton
      Left = 195
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Replace|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333FF3FF3333333333CC30003333333333773777333333333C33
        3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
        33003377333337F33377333333333C333300333F333337F33377339333333C33
        3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
        330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
        330077F377F337F33377993399333C33330077FF773337F33377399993333C33
        33333777733337F333FF333333333C33300033333333373FF7773333333333CC
        3000333333333377377733333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = ReplaceItemClick
    end
    object BrowserBtn: TSpeedButton
      Left = 230
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Browser|'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555FFFFF555555555544C4C5555555555F777775FF5555554C444C444
        5555555775FF55775F55554C4334444445555575577F55557FF554C4C334C4C4
        335557F5577FF55577F554CCC3334444335557555777F555775FCCCCC333CCC4
        C4457F55F777F555557F4CC33333CCC444C57F577777F5F5557FC4333333C3C4
        CCC57F777777F7FF557F4CC33333333C4C457F577777777F557FCCC33CC4333C
        C4C575F7755F777FF5755CCCCC3333334C5557F5FF777777F7F554C333333333
        CC55575777777777F755553333CC3C33C555557777557577755555533CC4C4CC
        5555555775FFFF77555555555C4CCC55555555555777775555550000}
      NumGlyphs = 2
      OnClick = BrowserItemClick
    end
    object InterpreterBtn: TSpeedButton
      Left = 255
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Interpreter|'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333
        3330337F3F7F33333F3787070003333707303F737773333373F7007703333330
        700077337F3333373777887007333337007733F773F333337733700070333333
        077037773733333F7F37703707333300080737F373333377737F003333333307
        78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733
        078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730
        70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003
        3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003
        33337F73FF7377733333078000770333333373377733733333330000}
      NumGlyphs = 2
      OnClick = InterpreterItemClick
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 232
    Width = 427
    Height = 19
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Panels = <>
    ParentFont = False
    SimplePanel = True
  end
  object MainMenu1: TMainMenu
    Left = 36
    Top = 196
    object File1: TMenuItem
      Caption = '&File'
      Hint = 'File related commands'
      ShortCut = 0
      object FileNewItem: TMenuItem
        Caption = '&New'
        Hint = 'Create a new file'
        ShortCut = 0
        OnClick = FileNewItemClick
      end
      object FileOpenItem: TMenuItem
        Caption = '&Open'
        Hint = 'Open an existing file'
        ShortCut = 0
        OnClick = FileOpenItemClick
      end
      object FileCloseItem: TMenuItem
        Caption = '&Close'
        Hint = 'Close current file'
        ShortCut = 0
        OnClick = FileCloseItemClick
      end
      object FileSaveItem: TMenuItem
        Caption = '&Save'
        Hint = 'Save current file'
        ShortCut = 0
        OnClick = FileSaveItemClick
      end
      object FileSaveAsItem: TMenuItem
        Caption = 'Save &As...'
        Hint = 'Save current file as...'
        ShortCut = 0
        OnClick = FileSaveAsItemClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FileExitItem: TMenuItem
        Caption = 'E&xit'
        Hint = 'Exit the application'
        ShortCut = 0
        OnClick = FileExitItemClick
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object CutItem: TMenuItem
        Caption = 'Cu&t'
        Hint = 'Cut to clipboard'
        ShortCut = 0
        OnClick = CutItemClick
      end
      object CopyItem: TMenuItem
        Caption = '&Copy'
        Hint = 'Copy to clipboard'
        ShortCut = 0
        OnClick = CopyItemClick
      end
      object PasteItem: TMenuItem
        Caption = '&Paste'
        Hint = 'Paste from clipboard'
        ShortCut = 0
        OnClick = PasteItemClick
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object SearchItem: TMenuItem
        Caption = 'Search'
        Hint = 'Search for text'
        ShortCut = 0
        OnClick = SearchItemClick
      end
      object ReplaceItem: TMenuItem
        Caption = 'Replace'
        Hint = 'Replace text'
        ShortCut = 0
        OnClick = ReplaceItemClick
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object FontItem: TMenuItem
        Caption = '&Font'
        Hint = 'Change Font'
        ShortCut = 0
        OnClick = FontItemClick
      end
    end
    object Java1: TMenuItem
      Caption = 'Java'
      ShortCut = 0
      object CompileItem: TMenuItem
        Caption = 'Compile'
        Hint = 'Compile Java Code'
        ShortCut = 0
        OnClick = CompileItemClick
      end
      object JavaOptions1: TMenuItem
        Caption = 'Java Options'
        Hint = 'Java Options'
        ShortCut = 0
        OnClick = JavaOptions1Click
      end
    end
    object Run1: TMenuItem
      Caption = 'Run'
      ShortCut = 0
      object BrowserItem: TMenuItem
        Caption = 'Browser'
        ShortCut = 0
        OnClick = BrowserItemClick
      end
      object InterpreterItem: TMenuItem
        Caption = 'Interpreter'
        ShortCut = 0
        OnClick = InterpreterItemClick
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      Hint = 'Window related commands such as Tile and Cascade'
      ShortCut = 0
      object WindowCascadeItem: TMenuItem
        Caption = '&Cascade'
        Hint = 'Arrange windows to overlap'
        ShortCut = 0
        OnClick = WindowCascadeItemClick
      end
      object WindowTileItem: TMenuItem
        Caption = '&Tile'
        Hint = 'Arrange windows without overlap'
        ShortCut = 0
        OnClick = WindowTileItemClick
      end
      object WindowArrangeItem: TMenuItem
        Caption = '&Arrange Icons'
        Hint = 'Arrange window icons at bottom of main window'
        ShortCut = 0
        OnClick = WindowArrangeItemClick
      end
      object WindowMinimizeItem: TMenuItem
        Caption = '&Minimize All'
        Hint = 'Minimize all windows'
        ShortCut = 0
        OnClick = WindowMinimizeItemClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      Hint = 'Help topics'
      ShortCut = 0
      object HelpAboutItem: TMenuItem
        Caption = '&About'
        ShortCut = 0
        OnClick = HelpAboutItemClick
      end
    end
  end
  object OpenDialog: TOpenDialog
    FileEditStyle = fsEdit
    Filter =
      'Java file (*.java,*.jav)|*.java;*.jav|Html file (*.html, *.htm)|' +
      '*.html;*.htm|All files (*.*)|*.*'
    Left = 4
    Top = 196
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 69
    Top = 197
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Left = 104
    Top = 200
  end
  object FindDialog1: TFindDialog
    Options = [frDown, frHideWholeWord, frHideUpDown, frDisableUpDown, frDisableWholeWord]
    OnFind = FindDialog1Find
    Left = 144
    Top = 200
  end
  object ReplaceDialog1: TReplaceDialog
    Options = [frDown, frHideWholeWord, frHideUpDown, frDisableUpDown, frDisableWholeWord]
    OnReplace = ReplaceDialog1Replace
    Left = 176
    Top = 200
  end
end